(Info-extract-pointer): Ignore Info-header-line.

diff --git a/lisp/info.el b/lisp/info.el
index 37c32270c56d111d8b6cc58bb1b8f3c8fac1364e..28210b528acde7fdc8f35f6f3d6e92c4d856dc78 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1247,10 +1247,10 @@ Bind this in case the user sets it to nil."
     (save-excursion
       (save-restriction
        (goto-char (point-min))
-       (when Info-header-line
-         ;; expose the header line in the buffer
-         (widen)
-         (forward-line -1))
+;;;    (when Info-header-line
+;;;      ;; expose the header line in the buffer
+;;;      (widen)
+;;;      (forward-line -1))
        (let ((bound (point)))
          (forward-line 1)
          (cond ((re-search-backward (concat name ":") bound t)